home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue59 / Arch / Extended Sample / CustomerOrders.dpr < prev    next >
Encoding:
Text File  |  2000-06-05  |  2.1 KB  |  37 lines
  1. program CustomerOrders;
  2.  
  3. uses
  4.   Forms,
  5.   UnitCommonTypes in 'UnitCommonTypes.pas',
  6.   UnitFormBase in 'UnitFormBase.pas' {FormBase},
  7.   UnitFormEntityBase in 'UnitFormEntityBase.pas' {FormEntityBase},
  8.   UnitFormMain in 'UnitFormMain.pas' {FormMain},
  9.   UnitObjectBase in 'UnitObjectBase.pas' {ObjectBase: TDataModule},
  10.   UnitObjectEntityBase in 'UnitObjectEntityBase.pas' {ObjectEntityBase: TDataModule},
  11.   UnitFormListBase in 'UnitFormListBase.pas' {FormListBase},
  12.   UnitObjectResultSetBase in 'UnitObjectResultSetBase.pas' {ObjectResultSetBase: TDataModule},
  13.   UnitFrameResultSetBase in 'UnitFrameResultSetBase.pas' {FrameResultSetBase: TFrame},
  14.   UnitFormListOrders in 'UnitFormListOrders.pas' {FormListOrders},
  15.   UnitFrameResultSetOrders in 'UnitFrameResultSetOrders.pas' {FrameResultSetOrders: TFrame},
  16.   UnitObjectResultSetOrders in 'UnitObjectResultSetOrders.pas' {ObjectResultSetOrders: TDataModule},
  17.   UnitFrameResultSetCustomer in 'UnitFrameResultSetCustomer.pas' {FrameResultSetCustomer: TFrame},
  18.   UnitFormListCustomer in 'UnitFormListCustomer.pas' {FormListCustomer},
  19.   UnitObjectResultSetCustomer in 'UnitObjectResultSetCustomer.pas' {ObjectResultSetCustomer: TDataModule},
  20.   UnitObjectEntityCustomer in 'UnitObjectEntityCustomer.pas' {ObjectEntityCustomer: TDataModule},
  21.   UnitFormEntityCustomer in 'UnitFormEntityCustomer.pas' {FormEntityCustomer},
  22.   UnitFormEntityOrders in 'UnitFormEntityOrders.pas' {FormEntityOrders},
  23.   UnitObjectEntityOrders in 'UnitObjectEntityOrders.pas' {ObjectEntityOrders: TDataModule},
  24.   UnitObjectEntityEmployee in 'UnitObjectEntityEmployee.pas' {ObjectEntityEmployee: TDataModule},
  25.   UnitFormEntityEmployee in 'UnitFormEntityEmployee.pas' {FormEntityEmployee},
  26.   UnitObjectResultSetEmployee in 'UnitObjectResultSetEmployee.pas' {ObjectResultSetEmployee: TDataModule},
  27.   UnitFrameResultSetEmployee in 'UnitFrameResultSetEmployee.pas' {FrameResultSetEmployee: TFrame},
  28.   UnitFormListEmployee in 'UnitFormListEmployee.pas' {FormListEmployee};
  29.  
  30. {$R *.RES}
  31.  
  32. begin
  33.   Application.Initialize;
  34.   Application.CreateForm(TFormMain, FormMain);
  35.   Application.Run;
  36. end.
  37.